Imports TagLib

Partial Class Controls_Tagging_TaggingStats
    Inherits System.Web.UI.UserControl

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Page.IsPostBack Then Return
        Dim ds As Data.DataSet = TagLib.SqlHelper.ExecuteDataset(BusinessBase.ConnectionString, System.Data.CommandType.StoredProcedure, "TagGetStats")

        Me.gvTagStats.DataSource = ds.Tables(0)
        Me.gvTopUsersToday.DataSource = ds.Tables(1)
        Me.gvTopUsersAllTime.DataSource = ds.Tables(2)
        Me.gvTagCount.DataSource = ds.Tables(3)

        Me.DataBind()


    End Sub
End Class
